home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
c't freeware shareware 2001 January
/
CT_SW0101.ISO
/
pc
/
software
/
kommunik
/
multimed
/
snakcarb.sit
/
Snak 4.6.3 Carbon
/
Scripts
/
pp-silly.irc
< prev
next >
Wrap
Text File
|
1996-03-21
|
23KB
|
809 lines
# ########################################################################## #
# PurePak - The sequel to TextBox #
# A -+ TEXT +- production #
# ########################################################################## #
# Author: Crypt Keeper [ckeeper@axiom.access.one.net] (CKeeper on IRC)
# Version 2.07
#
# This script requires at least ircII2.2.9 (Unix) or a fully ircII compatible
# client. It has only been tested under Unix with ircII2.2.9 and ircII2.8.
#
# If you edit this file, you must edit it with a Unix text editor or use
# utilities like dos2unix/unix2dos to convert it to DOS to edit and then
# back to Unix. If it is edited in a DOS text editor it will be corrupted.
#
# PurePak version 2.07 IRC script
# Copyright (C) 1995
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 1, or (at your option)
# any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
# ########################################################################## #
# Useless, annoying things module
@ PP.SILLY = 1
# ----------------------------------------------------------------------------
# ASCII art: the surest way to get kicked!
# ----------------------------------------------------------------------------
alias silly.art.dhead {
sendto $0 /~o~\\;/sendto $0 / \\ YOU DICKHEAD!!!
sendto $0 / \\;/sendto $0 (((((O)))))
sendto $0 | |
}
alias silly.art.humpindogs {
sendto $0 o__/- \\;/sendto $0 \\/__ \\__
sendto $0 \/ __ //\\ \\ /
sendto $0 o_/o \\-//--\\ \\_/
sendto $0 ~\\/___ ____=o |
sendto $0 _/_/ \\/_/
sendto $0 /\\;/sendto $0 ----------------
}
alias silly.art.homer {
sendto $0 _____
sendto $0 / \\;/sendto $0 \\/\\/ |
sendto $0 | (o)(o)
sendto $0 C .---_)
sendto $0 | |.___| d0h!!!!
sendto $0 | \\__/
sendto $0 /_____\\;/sendto $0 /____/\_\\
}
alias silly.art.bart {
sendto $0 ||/|/|/|
sendto $0 | |
sendto $0 | (o)(o)
sendto $0 C )
sendto $0 | /__| Dont have a cow man!
sendto $0 | /
sendto $0 / |
}
alias silly.art.crapcow2 {
sendto $0 | (oo)
sendto $0 o=o=o=|------\\/
sendto $0 | |
sendto $0 oo ||----||
sendto $0 oooo ^^ ^^
}
alias silly.art.neener {
sendto $0 \\|/ ____ \\|/
sendto $0 ~@-/ oO \\-@~
sendto $0 /_( \__/ )_\\;/sendto $0 \\__U_/
sendto $0 Neener, neener, neener.
}
alias silly.art.lame {
sendto $0 :'##::::::::::'###::::'##::::'##:'########:
sendto $0 : ##:::::::::'## ##::: ###::'###: ##.....::
sendto $0 : ##::::::::'##:. ##:: ####'####: ##:::::::
sendto $0 : ##:::::::'##:::. ##: ## ### ##: ######:::
sendto $0 : ##::::::: #########: ##. #: ##: ##...::::
sendto $0 : ##::::::: ##.... ##: ##:.:: ##: ##:::::::
sendto $0 : ########: ##:::: ##: ##:::: ##: ########:
sendto $0 ::........::..:::::..::..:::::..::........:
}
alias silly.art.spam {
sendto $0 ,dP""8a "888888b, d8b "888b ,888" EaT iT
sendto $0 88b " 888 d88 dPY8b 88Y8b,8888
sendto $0 `"Y8888a 888ad8P'dPaaY8b 88 Y88P888 TaSTe iT
sendto $0 a, Y88 888 dP Y8b 88 YP 888
sendto $0 `"8ad8P'a888a a88a *a888aa88a a888a KiSS iT
}
alias silly.art.train {
sendto $0 . . . . o o o o o
sendto $0 _____ o _______
sendto $0 ____==== ]OO|_n_n__][. |lamer|
sendto $0 [________]_|__|________)< |ville|
sendto $0 oo oo 'oo OOOO-| oo\\_ ~~~|~~~
sendto $0 +--+--+--+--+--+--+--+--+-$1-+--+--+--+--+--+
}
alias silly.art.sopbeg {/sendto $0 [SuBLiMiNaL oPS BeG] Hi there every+one! H+ow's it g+oing?}
alias silly.art.spamcow {
sendto $0 (__) *SSSSS**PPPPP***AAA***MM***MM*
sendto $0 /oo\\_*S******P***P**A***A**M*M*M*M*\\;/sendto $0 \\ /~*SSSSS**PPPPP**AAAAA**M**M**M* |
sendto $0 oo *****S**P******A***A**M*****M* |
sendto $0 *SSSSS**P******A***A**M*****M* ^
sendto $0 | | | |
sendto $0 ^ ^ ^ ^
}
alias silly.art.bong {
sendto $0 _____
sendto $0 | A | RoaST a BoWL!
sendto $0 | N |
sendto $0 | A |
sendto $0 | U | \) \);/sendto $0 | J | \(;/sendto $0 | I | \( \);/sendto $0 | R | \);/sendto $0 | A | \);/sendto $0 | M |
sendto $0 | o | U
sendto $0 | |//
sendto $0 | |/
sendto $0 | |
sendto $0 /|___|\\;/sendto $0 \\_____/
}
alias silly.art.humpincows {
sendto $0 (___)
sendto $0 (o o) <===== $1
sendto $0 /------\\ / (__)
sendto $0 / ____O (oo) <===== $2-
sendto $0 | / /----\\----\\/
sendto $0 /\\oo===| / ||
sendto $0 | || *||^-----||
sendto $0 * ^^ ^^ ^^
}
alias silly.art.crapcow {
sendto $0 (__) <== $1
sendto $0 /oo\\________
sendto $0 \\ / \\;/sendto $0 \\/ / \\;/sendto $0 \\_|___\\_|/.\\;/sendto $0 || YY| o '
sendto $0 || || O <== $2
sendto $0 ^^ ^^
}
alias silly.art.sitonthis {
sendto $0 n /
sendto $0 H o o
sendto $0 nnHnn [ S1T 0N TH1Z AND R0T4T3!
sendto $0 VVVVV ___/
}
alias silly.art.flickoff {
sendto $0 _____
sendto $0 |_ _|
sendto $0 n (O O) n
sendto $0 H _|\\_/|_ H
sendto $0 nHnn/ \\___/ \\nnHn
sendto $0 <V VV / \ VV V>
sendto $0 \\__\\/| |\\/__/
}
alias silly.art.borgcow {
sendto $0 "We are cow."
sendto $0 (__)
sendto $0 /oo\\################
sendto $0 \\ /################\\;/sendto $0 \\/ ################ |
sendto $0 ################ |
sendto $0 ################ |
sendto $0 ################
sendto $0 | | | |
sendto $0 ^ ^ ^ ^
}
alias silly.art.ops {
sendto $0 <<<< +o+o+o+o+o+ o+o+o+o+o+o+ o+o+o+o+o+o
sendto $0 <<<< o+o o+o +o+ o+o +o+
sendto $0 <<<< +o+ +o+ o+o +o+ o+o
sendto $0 <<<<================= o+o o+o +o+ o+o +o+o+o+o+o+
sendto $0 <<<<================= +o+ +o+ o+o+o+o+o+o+ o+o+o+o+o+o
sendto $0 <<<< o+o o+o +o+ +o+
sendto $0 <<<< +o+ +o+ o+o o+o
sendto $0 <<<< o+o+o+o+o+o +o+ +o+o+o+o+o+
}
alias silly.art.deadcat {
sendto $0 /\\;/sendto $0 / \\_______/\\/\\;/sendto $0 / \\;/sendto $0 |_ -X XX _ /
sendto $0 \\ ~-_ oo _-~ |
sendto $0 -\\--- ____ -----/
sendto $0 \\-~ \\_\\ ~-_/
sendto $0 -~ ~~\\ / ~
sendto $0 !WOEM
}
alias silly.art.cat {
sendto $0 _ __/|
sendto $0 \\'X.X'
sendto $0 =(___)= Meow!
sendto $0 U
}
alias silly.art.w00p {
sendto $0 ____ ____
sendto $0 _ __/ __ \\/ __ \\____
sendto $0 | | /| / / / / / / / / __ \\;/sendto $0 | |/ |/ / /_/ / /_/ / /_/ /
sendto $0 |__/|__/\\____/\\____/ .___/
sendto $0 /_/
}
alias ascii {
if ([$0])
{
if (match($0 SOPBEG SPAMCOW BONG SITONTHIS BORGCOW OPS DEADCAT CAT W00P NEENER LAME SPAM DHEAD HUMPINDOGS HOMER BART CRAPCOW2))
{
if ([$1]) {/silly.art.$0 $1} {/silly.art.$0 $T}
}
{
if (match($0 TRAIN HUMPINCOWS CRAPCOW))
{
if ([$0] == [TRAIN])
{
if ([$2]) {/silly.art.train $2 $1}
{
if ([$1]) {/silly.art.train $1} {/silly.art.train $T}
}
}
{
if ([$3]) {/silly.art.$0 $3 $1 $2}
{
if ([$2]) {/silly.art.$0 $T $1 $2} {/echo *** You need two nicks for the $0}
}
}
} {/echo *** No such ascii art: $0}
}
}
{
echo *** /ascii <name of ascii art> [<any other parameters>] [<nick/channel>]
echo *** Available ascii art:
echo *** train <nick> - Train to lamerville running over <nick>
echo *** sopbeg - "Subliminal ops beg"
echo *** spamcow - Where spam comes from
echo *** bong - Roast a bowl!
echo *** humpincows [<who's on top>] [<who's on bottom>] - Humping cows
echo *** crapcow [<who's the cow>] [<who's the crap>] - Crapping cow
echo *** sitonthis - The finger with "Sit on this and rotate!"
echo *** borgcow - "We are cow."
echo *** ops - Huge sign begging for ops
echo *** deadcat - An ex-cat
echo *** cat - A living cat
echo *** w00p - Big "w00p" sign
echo *** spam - Big SPAM graphic
echo *** neener - "Neener Neener Neener!"
echo *** lame - Big "lame" sign
echo *** dhead - You dickhead!
echo *** humpindogs - Like it says
echo *** homer - Homer Simpson
echo *** bart - Bart Simpson
echo *** crapcow2 - Another crapping cow
}
}
# ----------------------------------------------------------------------------
# Big text writer
# ----------------------------------------------------------------------------
@ SILLY.BIG.1.A = [ /// ]
@ SILLY.BIG.2.A = [/ /]
@ SILLY.BIG.3.A = [/////]
@ SILLY.BIG.4.A = [/ /]
@ SILLY.BIG.5.A = [/ /]
@ SILLY.BIG.1.B = [//// ]
@ SILLY.BIG.2.B = [/ /]
@ SILLY.BIG.3.B = [//// ]
@ SILLY.BIG.4.B = [/ /]
@ SILLY.BIG.5.B = [//// ]
@ SILLY.BIG.1.C = [/////]
@ SILLY.BIG.2.C = [/ ]
@ SILLY.BIG.3.C = [/ ]
@ SILLY.BIG.4.C = [/ ]
@ SILLY.BIG.5.C = [/////]
@ SILLY.BIG.1.D = [//// ]
@ SILLY.BIG.2.D = [/ /]
@ SILLY.BIG.3.D = [/ /]
@ SILLY.BIG.4.D = [/ /]
@ SILLY.BIG.5.D = [//// ]
@ SILLY.BIG.1.E = [/////]
@ SILLY.BIG.2.E = [/ ]
@ SILLY.BIG.3.E = [/// ]
@ SILLY.BIG.4.E = [/ ]
@ SILLY.BIG.5.E = [/////]
@ SILLY.BIG.1.F = [/////]
@ SILLY.BIG.2.F = [/ ]
@ SILLY.BIG.3.F = [/// ]
@ SILLY.BIG.4.F = [/ ]
@ SILLY.BIG.5.F = [/ ]
@ SILLY.BIG.1.G = [/////]
@ SILLY.BIG.2.G = [/ ]
@ SILLY.BIG.3.G = [/ //]
@ SILLY.BIG.4.G = [/ /]
@ SILLY.BIG.5.G = [/////]
@ SILLY.BIG.1.H = [/ /]
@ SILLY.BIG.2.H = [/ /]
@ SILLY.BIG.3.H = [/////]
@ SILLY.BIG.4.H = [/ /]
@ SILLY.BIG.5.H = [/ /]
@ SILLY.BIG.1.I = [/////]
@ SILLY.BIG.2.I = [ / ]
@ SILLY.BIG.3.I = [ / ]
@ SILLY.BIG.4.I = [ / ]
@ SILLY.BIG.5.I = [/////]
@ SILLY.BIG.1.J = [ /]
@ SILLY.BIG.2.J = [ /]
@ SILLY.BIG.3.J = [ /]
@ SILLY.BIG.4.J = [/ /]
@ SILLY.BIG.5.J = [/////]
@ SILLY.BIG.1.K = [/ /]
@ SILLY.BIG.2.K = [/ / ]
@ SILLY.BIG.3.K = [/// ]
@ SILLY.BIG.4.K = [/ / ]
@ SILLY.BIG.5.K = [/ /]
@ SILLY.BIG.1.L = [/ ]
@ SILLY.BIG.2.L = [/ ]
@ SILLY.BIG.3.L = [/ ]
@ SILLY.BIG.4.L = [/ ]
@ SILLY.BIG.5.L = [/////]
@ SILLY.BIG.1.M = [ /// ]
@ SILLY.BIG.2.M = [/ / /]
@ SILLY.BIG.3.M = [/ / /]
@ SILLY.BIG.4.M = [/ /]
@ SILLY.BIG.5.M = [/ /]
@ SILLY.BIG.1.N = [/ /]
@ SILLY.BIG.2.N = [// /]
@ SILLY.BIG.3.N = [/ / /]
@ SILLY.BIG.4.N = [/ //]
@ SILLY.BIG.5.N = [/ /]
@ SILLY.BIG.1.O = [/////]
@ SILLY.BIG.2.O = [/ /]
@ SILLY.BIG.3.O = [/ /]
@ SILLY.BIG.4.O = [/ /]
@ SILLY.BIG.5.O = [/////]
@ SILLY.BIG.1.P = [/////]
@ SILLY.BIG.2.P = [/ /]
@ SILLY.BIG.3.P = [/////]
@ SILLY.BIG.4.P = [/ ]
@ SILLY.BIG.5.P = [/ ]
@ SILLY.BIG.1.Q = [/////]
@ SILLY.BIG.2.Q = [/ /]
@ SILLY.BIG.3.Q = [/ /]
@ SILLY.BIG.4.Q = [/ //]
@ SILLY.BIG.5.Q = [/////]
@ SILLY.BIG.1.R = [/////]
@ SILLY.BIG.2.R = [/ /]
@ SILLY.BIG.3.R = [/////]
@ SILLY.BIG.4.R = [/// ]
@ SILLY.BIG.5.R = [/ //]
@ SILLY.BIG.1.S = [/////]
@ SILLY.BIG.2.S = [/ ]
@ SILLY.BIG.3.S = [/////]
@ SILLY.BIG.4.S = [ /]
@ SILLY.BIG.5.S = [/////]
@ SILLY.BIG.1.T = [/////]
@ SILLY.BIG.2.T = [ / ]
@ SILLY.BIG.3.T = [ / ]
@ SILLY.BIG.4.T = [ / ]
@ SILLY.BIG.5.T = [ / ]
@ SILLY.BIG.1.U = [/ /]
@ SILLY.BIG.2.U = [/ /]
@ SILLY.BIG.3.U = [/ /]
@ SILLY.BIG.4.U = [/ /]
@ SILLY.BIG.5.U = [/////]
@ SILLY.BIG.1.V = [/ /]
@ SILLY.BIG.2.V = [/ /]
@ SILLY.BIG.3.V = [ / / ]
@ SILLY.BIG.4.V = [ / / ]
@ SILLY.BIG.5.V = [ / ]
@ SILLY.BIG.1.W = [/ /]
@ SILLY.BIG.2.W = [/ /]
@ SILLY.BIG.3.W = [/ / /]
@ SILLY.BIG.4.W = [/ / /]
@ SILLY.BIG.5.W = [ / / ]
@ SILLY.BIG.1.X = [/ /]
@ SILLY.BIG.2.X = [ / / ]
@ SILLY.BIG.3.X = [ / ]
@ SILLY.BIG.4.X = [ / / ]
@ SILLY.BIG.5.X = [/ /]
@ SILLY.BIG.1.Y = [/ /]
@ SILLY.BIG.2.Y = [ / / ]
@ SILLY.BIG.3.Y = [ / ]
@ SILLY.BIG.4.Y = [ / ]
@ SILLY.BIG.5.Y = [ / ]
@ SILLY.BIG.1.Z = [/////]
@ SILLY.BIG.2.Z = [ / ]
@ SILLY.BIG.3.Z = [ / ]
@ SILLY.BIG.4.Z = [ / ]
@ SILLY.BIG.5.Z = [/////]
@ SILLY.BIG.1.0 = [ /// ]
@ SILLY.BIG.2.0 = [/ /]
@ SILLY.BIG.3.0 = [/ /]
@ SILLY.BIG.4.0 = [/ /]
@ SILLY.BIG.5.0 = [ /// ]
@ SILLY.BIG.1.1 = [ / ]
@ SILLY.BIG.2.1 = [ // ]
@ SILLY.BIG.3.1 = [ / ]
@ SILLY.BIG.4.1 = [ / ]
@ SILLY.BIG.5.1 = [/////]
@ SILLY.BIG.1.2 = [/////]
@ SILLY.BIG.2.2 = [/ / ]
@ SILLY.BIG.3.2 = [ / ]
@ SILLY.BIG.4.2 = [ / ]
@ SILLY.BIG.5.2 = [/////]
@ SILLY.BIG.1.3 = [/////]
@ SILLY.BIG.2.3 = [ /]
@ SILLY.BIG.3.3 = [ ///]
@ SILLY.BIG.4.3 = [ /]
@ SILLY.BIG.5.3 = [/////]
@ SILLY.BIG.1.4 = [/ /]
@ SILLY.BIG.2.4 = [/ /]
@ SILLY.BIG.3.4 = [/////]
@ SILLY.BIG.4.4 = [ /]
@ SILLY.BIG.5.4 = [ /]
@ SILLY.BIG.1.5 = [/////]
@ SILLY.BIG.2.5 = [/ ]
@ SILLY.BIG.3.5 = [/////]
@ SILLY.BIG.4.5 = [ /]
@ SILLY.BIG.5.5 = [/////]
@ SILLY.BIG.1.6 = [/////]
@ SILLY.BIG.2.6 = [/ ]
@ SILLY.BIG.3.6 = [/////]
@ SILLY.BIG.4.6 = [/ /]
@ SILLY.BIG.5.6 = [/////]
@ SILLY.BIG.1.7 = [/////]
@ SILLY.BIG.2.7 = [ /]
@ SILLY.BIG.3.7 = [ / ]
@ SILLY.BIG.4.7 = [ / ]
@ SILLY.BIG.5.7 = [ / ]
@ SILLY.BIG.1.8 = [/////]
@ SILLY.BIG.2.8 = [/ /]
@ SILLY.BIG.3.8 = [/////]
@ SILLY.BIG.4.8 = [/ /]
@ SILLY.BIG.5.8 = [/////]
@ SILLY.BIG.1.9 = [/////]
@ SILLY.BIG.2.9 = [/ /]
@ SILLY.BIG.3.9 = [/////]
@ SILLY.BIG.4.9 = [ /]
@ SILLY.BIG.5.9 = [/////]
@ SILLY.BIG.1.PND = [ / / ]
@ SILLY.BIG.2.PND = [/////]
@ SILLY.BIG.3.PND = [ / / ]
@ SILLY.BIG.4.PND = [/////]
@ SILLY.BIG.5.PND = [ / / ]
@ SILLY.BIG.1.EXC = [ / ]
@ SILLY.BIG.2.EXC = [ / ]
@ SILLY.BIG.3.EXC = [ / ]
@ SILLY.BIG.4.EXC = [ ]
@ SILLY.BIG.5.EXC = [ / ]
@ SILLY.BIG.1.QUE = [/////]
@ SILLY.BIG.2.QUE = [ /]
@ SILLY.BIG.3.QUE = [ // ]
@ SILLY.BIG.4.QUE = [ ]
@ SILLY.BIG.5.QUE = [ / ]
@ SILLY.BIG.1.PNT = [ ]
@ SILLY.BIG.2.PNT = [ ]
@ SILLY.BIG.3.PNT = [ ]
@ SILLY.BIG.4.PNT = [ ]
@ SILLY.BIG.5.PNT = [ / ]
@ SILLY.BIG.1.SPC = [ ]
@ SILLY.BIG.2.SPC = [ ]
@ SILLY.BIG.3.SPC = [ ]
@ SILLY.BIG.4.SPC = [ ]
@ SILLY.BIG.5.SPC = [ ]
alias bigwrite {
if ([$1])
{
if (rindex($right(1 $1-) $1-) > 9) {/echo *** Too many characters (max 10)}
{
@ BPTR = 0
@ BLEN = rindex($right(1 $1-) $1-)
while (BPTR <= BLEN)
{
@ BCHR = mid($BPTR 1 $1-)
if (BCHR == [#]) {@ BCHR = [PND]}
if (BCHR == [.]) {@ BCHR = [PNT]}
if (BCHR == [!]) {@ BCHR = [EXC]}
if (BCHR == [?]) {@ BCHR = [QUE]}
if (BCHR == [ ]) {@ BCHR = [SPC]}
@ BIG.1 = BIG.1##[ $SILLY.BIG.1[$BCHR]]
@ BIG.2 = BIG.2##[ $SILLY.BIG.2[$BCHR]]
@ BIG.3 = BIG.3##[ $SILLY.BIG.3[$BCHR]]
@ BIG.4 = BIG.4##[ $SILLY.BIG.4[$BCHR]]
@ BIG.5 = BIG.5##[ $SILLY.BIG.5[$BCHR]]
@ BPTR = BPTR + 1
}
@ BIG.1 = [ $BIG.1]
@ BIG.2 = [ $BIG.2]
@ BIG.3 = [ $BIG.3]
@ BIG.4 = [ $BIG.4]
^assign -BCHR
foreach BIG AA {
sendto $0 $BIG[$AA]
^assign -BIG[$AA]
}
^assign -BPTR
^assign -BLEN
}
}
{
echo *** /bigwrite <nick/channel> <string to write> (max 10 chars)
echo *** Allowed characters: abcdefghijklmnopqrstuvwxyz0123456789#!?.
}
}
alias bigsay {/bigwrite $T $*}
# ----------------------------------------------------------------------------
# "Eleet" writer
# ----------------------------------------------------------------------------
@ SILLY.SANE = [abcdefghijklmnopqrstuvwxyz]
ASSIGN SILLY.LEET.0.0 a
ASSIGN SILLY.LEET.0.1 A
ASSIGN SILLY.LEET.0.2 @
ASSIGN SILLY.LEET.0.3 a
ASSIGN SILLY.LEET.1.0 b
ASSIGN SILLY.LEET.1.1 B
ASSIGN SILLY.LEET.1.2 |3
ASSIGN SILLY.LEET.1.3 b
ASSIGN SILLY.LEET.2.0 c
ASSIGN SILLY.LEET.2.1 C
ASSIGN SILLY.LEET.2.2 (
ASSIGN SILLY.LEET.2.3 [
ASSIGN SILLY.LEET.3.0 d
ASSIGN SILLY.LEET.3.1 D
ASSIGN SILLY.LEET.3.2 c|
ASSIGN SILLY.LEET.3.3 |)
ASSIGN SILLY.LEET.4.0 e
ASSIGN SILLY.LEET.4.1 E
ASSIGN SILLY.LEET.4.2 3
ASSIGN SILLY.LEET.4.3 [-
ASSIGN SILLY.LEET.5.0 f
ASSIGN SILLY.LEET.5.1 F
ASSIGN SILLY.LEET.5.2 /=
ASSIGN SILLY.LEET.5.3 ph
ASSIGN SILLY.LEET.6.0 g
ASSIGN SILLY.LEET.6.1 G
ASSIGN SILLY.LEET.6.2 9
ASSIGN SILLY.LEET.6.3 g
ASSIGN SILLY.LEET.7.0 h
ASSIGN SILLY.LEET.7.1 H
ASSIGN SILLY.LEET.7.2 /-/
ASSIGN SILLY.LEET.7.3 |-|
ASSIGN SILLY.LEET.8.0 i
ASSIGN SILLY.LEET.8.1 I
ASSIGN SILLY.LEET.8.2 1
ASSIGN SILLY.LEET.8.3 !
ASSIGN SILLY.LEET.9.0 j
ASSIGN SILLY.LEET.9.1 J
ASSIGN SILLY.LEET.9.2 j
ASSIGN SILLY.LEET.9.3 j
ASSIGN SILLY.LEET.10.0 k
ASSIGN SILLY.LEET.10.1 K
ASSIGN SILLY.LEET.10.2 |<
ASSIGN SILLY.LEET.10.3 /<
ASSIGN SILLY.LEET.11.0 l
ASSIGN SILLY.LEET.11.1 L
ASSIGN SILLY.LEET.11.2 |_
ASSIGN SILLY.LEET.11.3 /_
ASSIGN SILLY.LEET.12.0 m
ASSIGN SILLY.LEET.12.1 M
ASSIGN SILLY.LEET.12.2 |\/|
ASSIGN SILLY.LEET.12.3 M
ASSIGN SILLY.LEET.13.0 n
ASSIGN SILLY.LEET.13.1 N
ASSIGN SILLY.LEET.13.2 |\|
ASSIGN SILLY.LEET.13.3 N
ASSIGN SILLY.LEET.14.0 o
ASSIGN SILLY.LEET.14.1 O
ASSIGN SILLY.LEET.14.2 0
ASSIGN SILLY.LEET.14.3 ()
ASSIGN SILLY.LEET.15.0 p
ASSIGN SILLY.LEET.15.1 P
ASSIGN SILLY.LEET.15.2 |^
ASSIGN SILLY.LEET.15.3 p
ASSIGN SILLY.LEET.16.0 q
ASSIGN SILLY.LEET.16.1 Q
ASSIGN SILLY.LEET.16.2 Q
ASSIGN SILLY.LEET.16.3 q
ASSIGN SILLY.LEET.17.0 r
ASSIGN SILLY.LEET.17.1 R
ASSIGN SILLY.LEET.17.2 />
ASSIGN SILLY.LEET.17.3 r
ASSIGN SILLY.LEET.18.0 s
ASSIGN SILLY.LEET.18.1 S
ASSIGN SILLY.LEET.18.2 5
ASSIGN SILLY.LEET.18.3 $
ASSIGN SILLY.LEET.19.0 t
ASSIGN SILLY.LEET.19.1 T
ASSIGN SILLY.LEET.19.2 +
ASSIGN SILLY.LEET.19.3 ~|~
ASSIGN SILLY.LEET.20.0 u
ASSIGN SILLY.LEET.20.1 U
ASSIGN SILLY.LEET.20.2 (_)
ASSIGN SILLY.LEET.20.3 |_|
ASSIGN SILLY.LEET.21.0 v
ASSIGN SILLY.LEET.21.1 V
ASSIGN SILLY.LEET.21.2 \/
ASSIGN SILLY.LEET.21.3 v
ASSIGN SILLY.LEET.22.0 w
ASSIGN SILLY.LEET.22.1 W
ASSIGN SILLY.LEET.22.2 |/\|
ASSIGN SILLY.LEET.22.3 W
ASSIGN SILLY.LEET.23.0 x
ASSIGN SILLY.LEET.23.1 X
ASSIGN SILLY.LEET.23.2 )(
ASSIGN SILLY.LEET.23.3 ><
ASSIGN SILLY.LEET.24.0 y
ASSIGN SILLY.LEET.24.1 Y
ASSIGN SILLY.LEET.24.2 `/
ASSIGN SILLY.LEET.24.3 y
ASSIGN SILLY.LEET.25.0 z
ASSIGN SILLY.LEET.25.1 Z
ASSIGN SILLY.LEET.25.2 2
ASSIGN SILLY.LEET.25.3 ~/_
alias silly.eleetf {
@ SANE.STR = [$*]
@ SANE.LEN = @SANE.STR
@ LEET.STR = []
@ LEET.LEN = 0
while (LEET.LEN < SANE.LEN)
{
@ LEET.IND = index($mid($LEET.LEN 1 $SANE.STR) $SILLY.SANE)
if (LEET.IND > -1)
{
@ LEET.STR = LEET.STR##SILLY.LEET[$LEET.IND][$rand(4)]
}
{
@ LEET.STR = LEET.STR##mid($LEET.LEN 1 $SANE.STR)
}
@ LEET.LEN = LEET.LEN + 1
}
@ FUNCTION_RETURN = LEET.STR
^assign -LEET.LEN
^assign -LEET.STR
^assign -LEET.IND
^assign -SANE.STR
^assign -SANE.LEN
}
alias kradwrite {/sendto $0 $silly.eleetf($1-)}
alias kradsay {/say $silly.eleetf($0-)}
# ----------------------------------------------------------------------------
# Fake invites, fake massdeop
# ----------------------------------------------------------------------------
alias fakeinvite {
if ([$1])
{
^assign INVITESTR $strip(# $1)
^assign INVITESTR \#${INVITESTR}
quote INVITE $0 $INVITESTR
^assign -INVITESTR
echo *** Fake invited $0 to channel $1
} {/echo *** /fakeinvite <nick> <channel>}
}
# jokemassdeop [<deopnick>]
alias jokemassdeop {
if ([$0]) {@ DOPNICK = [$0]} {@ DOPNICK = [$N]}
^on ^who * {^if (([$1] != DOPNICK)&&(match(*@* $2))) {@ FDOPZ = FDOPZ##[$1 ]}}
//^who *
wait -CMD if (1) {
silly.dofakedop $FDOPZ
^assign -DOPNICK
^assign -FDOPZ
^on who -
}
}
alias silly.dofakedop {
if ([$2])
{
me change "-ooo $0 $1 $2" on channel $C by $DOPNICK
if ([$3]) {/silly.dofakedop $3-}
}
{
if ([$1]) {/me change "-oo $0 $1" on channel $C by $DOPNICK}
{/me change "-o $0" on channel $C by $DOPNICK}
}
}
# ----------------------------------------------------------------------------
# -+ TEXT +- encryption
# ----------------------------------------------------------------------------
# We add one setting to /pp : adecode on/off
@ PP.SETCHECKS.SILLY = [^silly.sets]
# Decoding on/off
EVAL ^if ([X$PP.SET.ADECODE] != [X]) {@ PP.SET.ADECODE = 1}
alias silly.sets {
if ([$0] == [ADECODE])
{
if (match($1 ON OFF)) {^if ([$1] == [ON]) {@ PP.SET.ADECODE = 1} {@ PP.SET.ADECODE = 0}}
if (PP.SET.ADECODE) {/echo *** Encryption decoding is now ON} {/echo *** Encryption decoding is now OFF}
@ VU = 1
}
}
on -public "% % * ?? -+ TEXT +-" {
if (PP.SET.ADECODE)
{
if ([$1] == C)
{
^timer 1 /echo [DECRYPT] <$0> $strip( $decode($left($index(" $2-) $2-)))
}
{
^timer 1 /echo [DECRYPT] <$0:$1> $strip( $decode($left($index(" $2-) $2-)))
}
}
}
on #-msg 2 "% * ?? -+ TEXT +-" {^if (PP.SET.ADECODE) {^echo [DECRYPT] *$0* $strip( $decode($left($index(" $1-) $1-)))}}
alias txt {/sendto $C $encode($0-)" $randcrap(2) -+ TEXT +-}
alias ptxt {/sendto $0 $encode($1-)" $randcrap(2) -+ TEXT +-}
# ----------------------------------------------------------------------------
# Other junk
# ----------------------------------------------------------------------------
alias megaop {
//mode $C +o $0
//mode $C +oo $0 $0
//mode $C +ooo $0 $0 $0
//mode $C +oo $0 $0
//mode $C +o $0
}
alias gigaop {
//mode $C +o $0
//mode $C +oo $0 $0
//mode $C +ooo $0 $0 $0
//mode $C +oooo $0 $0 $0 $0
//mode $C +ooo $0 $0 $0
//mode $C +oo $0 $0
//mode $C +o $0
}
alias w00p {
me *** PR3P4R1NG W00P F0R $0 ***
sleep 1
me *** T4RG3TT1NG $0 ***
sleep 1
sendto $C w00p!
me *** SUCC3SZFUL W00P ***
}
alias rkick {
if (C)
{
^on ^who * {^if ([$1] != N) {@ NIKZ = NIKZ##[ $1]}}
//^who *
wait -CMD if (1) {
^on who -
if (NIKZ)
{
//kick $C $word($rand($#NIKZ) $NIKZ) [Random Kick]
} {/echo *** Nobody to choose from!}
^assign -NIKZ
}
} {/echo *** You aren't on any channels}
}
# ----------------------------------------------------------------------------
EVAL ^if (!PP.SET.NOSTARTUP) {/echo -- PurePak lame junk module loaded}